home *** CD-ROM | disk | FTP | other *** search
- ;$VER:ConfigScript 1.0 for HFMounter 2.1
- (set @user-level 2)
- (set @default-dest "SYS:C/")
- (complete 0)
- (message "HFMounter 2.1 Configuration-Utility\n HFMounter is ©1996 by SuicideSoft\n"
- "\nAfter choosing HFMounter, you may change it's"
- " behaviour with this installer-script, setting it's tooltypes according to your "
- "personal needs. //\n\n"
- "Nach Auswahl des HFMounter's, kannst Du sein\n"
- "Verhalten durch Setzen der Tooltypes nach Deinen\n"
- "persönlichen Beduerfnissen konfigurieren.")
- (set #File-Txt (cat "Where is your installed HFM? Please select the file!\n"
- "//Wo hast Du HFM installiert? Bitte wähle es aus!"))
- (set #File-Help (cat "\nThis section lets you choose the \n"
- "installed HFMounter\n\n"
- "Hier kannst Du den HFMounter auswählen, da\n"
- "dessen Tooltypes geändert werden sollen.\n\n"
- "Default SYS:C/HFM\n\n\n" @askfile-help))
- (set @target
- (askfile
- (prompt #file-Txt)
- (help #file-Help)
- (default "SYS:C/HFM")))
- (set @default-dest "")
- (complete 25)
- (set @pubscreen
- (askstring (prompt "On which Pubscreen should HfMounter pop up?")
- (help "No help available")
- (default "Workbench")))
- (complete 50)
- (set @hfname
- (askstring (prompt "Which name should the Hf-Units get after formatting?")
- (help @askstring-help)
- (default "HF")))
- (complete 75)
- (set bitmask
- (askoptions (prompt "Select the tooltypes for HF-Units")
- (help @askoptions-help)
- (choices "FFS" "INTL" "DIRCACHE" "NOICONS"
- (default 11))))
- (complete 80)
- (working)
- (if (= bitmask 15)
- (tooltype (prompt "No prompting") (dest @target)
- (settooltype "NOICONS" "TRUE") (settooltype "DIRCACHE" "TRUE")
- (settooltype "INTL" "TRUE") (settooltype "FFS" "TRUE")
- (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
- (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
- (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
- (if (= bitmask 14)
- (tooltype (prompt "No prompting") (dest @target)
- (settooltype "NOICONS" "TRUE") (settooltype "DIRCACHE" "TRUE")
- (settooltype "INTL" "TRUE") (settooltype "FFS" "FALSE")
- (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
- (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
- (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
- (if (= bitmask 13)
- (tooltype (prompt "No prompting") (dest @target)
- (settooltype "NOICONS" "TRUE") (settooltype "DIRCACHE" "TRUE")
- (settooltype "INTL" "FALSE") (settooltype "FFS" "TRUE")
- (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
- (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
- (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
- (if (= bitmask 12)
- (tooltype (prompt "No prompting") (dest @target)
- (settooltype "NOICONS" "TRUE") (settooltype "DIRCACHE" "TRUE")
- (settooltype "INTL" "FALSE") (settooltype "FFS" "FALSE")
- (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
- (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
- (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
- (if (= bitmask 11)
- (tooltype (prompt "No prompting") (dest @target)
- (settooltype "NOICONS" "TRUE") (settooltype "DIRCACHE" "FALSE")
- (settooltype "INTL" "TRUE") (settooltype "FFS" "TRUE")
- (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
- (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
- (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
- (if (= bitmask 10)
- (tooltype (prompt "No prompting") (dest @target)
- (settooltype "NOICONS" "TRUE") (settooltype "DIRCACHE" "FALSE")
- (settooltype "INTL" "TRUE") (settooltype "FFS" "FALSE")
- (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
- (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
- (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
- (if (= bitmask 9)
- (tooltype (prompt "No prompting") (dest @target)
- (settooltype "NOICONS" "TRUE") (settooltype "DIRCACHE" "FALSE")
- (settooltype "INTL" "FALSE") (settooltype "FFS" "TRUE")
- (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
- (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
- (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
- (if (= bitmask 8)
- (tooltype (prompt "No prompting") (dest @target)
- (settooltype "NOICONS" "TRUE") (settooltype "DIRCACHE" "FALSE")
- (settooltype "INTL" "FALSE") (settooltype "FFS" "FALSE")
- (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
- (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
- (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
- (if (= bitmask 7)
- (tooltype (prompt "No prompting") (dest @target)
- (settooltype "NOICONS" "FALSE") (settooltype "DIRCACHE" "TRUE")
- (settooltype "INTL" "TRUE") (settooltype "FFS" "TRUE")
- (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
- (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
- (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
- (if (= bitmask 6)
- (tooltype (prompt "No prompting") (dest @target)
- (settooltype "NOICONS" "FALSE") (settooltype "DIRCACHE" "TRUE")
- (settooltype "INTL" "TRUE") (settooltype "FFS" "FALSE")
- (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
- (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
- (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
- (if (= bitmask 5)
- (tooltype (prompt "No prompting") (dest @target)
- (settooltype "NOICONS" "FALSE") (settooltype "DIRCACHE" "TRUE")
- (settooltype "INTL" "FALSE") (settooltype "FFS" "TRUE")
- (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
- (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
- (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
- (if (= bitmask 4)
- (tooltype (prompt "No prompting") (dest @target)
- (settooltype "NOICONS" "FALSE") (settooltype "DIRCACHE" "TRUE")
- (settooltype "INTL" "FALSE") (settooltype "FFS" "FALSE")
- (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
- (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
- (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
- (if (= bitmask 3)
- (tooltype (prompt "No prompting") (dest @target)
- (settooltype "NOICONS" "FALSE") (settooltype "DIRCACHE" "FALSE")
- (settooltype "INTL" "TRUE") (settooltype "FFS" "TRUE")
- (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
- (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
- (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
- (if (= bitmask 2)
- (tooltype (prompt "No prompting") (dest @target)
- (settooltype "NOICONS" "FALSE") (settooltype "DIRCACHE" "FALSE")
- (settooltype "INTL" "TRUE") (settooltype "FFS" "FALSE")
- (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
- (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
- (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
- (if (= bitmask 1)
- (tooltype (prompt "No prompting") (dest @target)
- (settooltype "NOICONS" "FALSE") (settooltype "DIRCACHE" "FALSE")
- (settooltype "INTL" "FALSE") (settooltype "FFS" "TRUE")
- (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
- (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
- (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
- (if (= bitmask 0)
- (tooltype (prompt "No prompting") (dest @target)
- (settooltype "NOICONS" "FALSE") (settooltype "DIRCACHE" "FALSE")
- (settooltype "INTL" "FALSE") (settooltype "FFS" "FALSE")
- (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
- (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
- (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
- (complete 100)
- (exit "That's all, configuration is finished now \n\n"
- "Das wars Leute, Konfiguration abgeschlossen.")
-